home *** CD-ROM | disk | FTP | other *** search
/ Revista do CD-ROM 102 / CD-ROM 102.iso / aplic / 2sync / 2SyncSetup.exe / graphics / scripts / DefineButton2_408 / BUTTONCONDACTION on(release).as < prev    next >
Encoding:
Text File  |  2002-03-20  |  726 b   |  17 lines
  1. on(release){
  2.    set("_level40/sound/lib:sound","112");
  3.    call("_level40/sound/lib:play");
  4.    gotoAndStop(1);
  5.    if(eval("_level0:" add eval("_level0:focus") add "_module") eq "mt")
  6.    {
  7.       path = "_level15/" add _name.substr("1","2") add "/mt/codelib";
  8.       if(!(eval(path add ":startday") != eval("_level0/data:thisday") and eval(path add ":startmonth") != eval("_level0/data:thismonth") and eval(path add ":startyear") != eval("_level0/data:thisyear")))
  9.       {
  10.       }
  11.       set(path add ":startday",eval("_level0/data:thisday"));
  12.       set(path add ":startmonth",eval("_level0/data:thismonth"));
  13.       set(path add ":startyear",eval("_level0/data:thisyear"));
  14.       call(path add ":view day");
  15.    }
  16. }
  17.